Дано число. Если оно больше 3, то увеличить число на 10, иначе уменьшить на 10
Решить в Паскале
плртпломм
2
20.05.2020 19:57
28
Другие вопросы по теме Информатика
ponaomarevp0btlh
30.10.2020 11:32
inak45612
08.06.2019 04:40
artemovfoxy1987
01.08.2019 14:20
roman20031022
01.08.2019 14:20
Dima1911
06.10.2019 19:33
berezinaanna199
06.10.2019 20:10
dum3
06.10.2019 20:10
dimanicich
06.10.2019 20:10
trohy71
06.10.2019 20:10
Anna977497
06.10.2019 20:10
Популярные вопросы
- A conductor shaped, as shown in the figure carries a current of 25,8 A....
3 - В ряду - MgO, H2SO4, K2CO3,FeCl2,NaNO3,HCl - число формул оксидов и солей...
1 - Очень решить тест по английскому языку, контрольная работа, очень важно...
3 - Чому при деяких різновидах міжвидового схрещування у ссавців плодючими...
3 - Зробіть будь ласка практичну, буду дуже вдячний. https://naurok.com.ua/prezentaciya-praktichna-robota-2-rozv-yazuvannya-eksperimentalnih-zadach-u-virtualniy-laboratori-178605.html...
1 - Прочитай предложения, преобразуй слова в скобках так, чтоб они грамматически...
2 - Имеется сталь двух сортов с содержанием никеля 10% и 50%. Сколько нужно...
1 - СН 3 –СН 2 -СООН СН 3 –СН 2 -СООН Назвіть дану речовину та вкажіть мету...
1 - Яка крайня точка Євразії найближена до екватора...
2 - 2. Сократните дроби:18а^7y^2/27a^3y^5...
2
Pascal:
var N: integer;
begin
write('Введите число N=');
read(N);
if N>3 then begin
N:=N+10;
writeln('Увеличиваем число на 10');
end
else begin
N:=N-10;
writeln('Уменьшаем число на 10');
end;
writeln('Новое значение числа N=',N);
end.