В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
valeriyanikiti
valeriyanikiti
01.03.2022 16:40 •  Информатика

Для самостоятельной работы: 1. имеются два числа. a) вычислите сумму и разность этих чисел, используя два оператора readln. b) перепишите программу так, чтобы использовался один оператор readln. c) добавьте комментарии к программе. 2. имеются три числа. вычислите их произведение. 3. по заданным сторонам прямоугольника a и b вычислите его периметр и площадь. 4. человеку сегодня исполнилось r лет. сколько ему дней? часов? минут? секунд? (високосные годы не учитывать)

Показать ответ
Ответ:
ilyafedoseev
ilyafedoseev
28.06.2020 17:16
1(a)
Program Zadanie;
var a,b,c,d:integer;
begin
writeln('введите два числа');
readln(a,b);
c:=a+b;
writeln(c);
readln;
d:=a-b;
writeln(d);
readln;
end.

b)
Program Zadanie;
var a,b,c,d:integer;
begin
writeln('введите два числа');
readln(a,b);
c:=a+b;
d:=a-b;
writeln(c,d);
readln;
end.

c)
Program Zadanie;
var a,b,c,d:integer; 
begin
writeln('введите два числа');  //здесь вводим два числа
readln(a,b);
c:=a+b;
d:=a-b;
writeln(c,d);
readln;
end.

2.
Program Zadanie;
var a,b,c,d:integer; 
begin
writeln('введите три числа');  
readln(a,b,c);
d:=a*b*c;
writeln(d);
readln;
end.

3.
Program Treugol;
var a,b,c,d:real; 
begin
writeln('введите два числа');  
readln(a,b);
c:=2*(a+b);
d:=a*b;
writeln(c,d);
readln;
end.

4.

Program Goda;
var R:real;
begin
write('введите R');
readln(R);
d:=R*356;
c:=d*24;
m:=c*60;
s:=m*60;
writeln(d);
writeln(c);
writeln(m);
writeln(s);
readln;
end.

Надеюсь на лучший ответ и на
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота