Предмет: Информатика, автор: Rezardo

СРОЧНО!!!!!
1. Как называется величина у которой есть имя, тип?
2. Напишите команду, с помощью которой можно ввести с клавиатуры значения двух целых чисел:
2-е число и 1-е число .
3. Используя числа из вопроса 2, напишите команду вывода на экран результат их суммы.
4. Используя числа из вопроса 2, напишите команду вывода на экран среднего арифметического этих чисел так, чтобы дробная часть содержала только десятитысячные значения.
5. Напишите все ключевые слова условного оператора.
Ответ дайте в отдельном файле.
Написать две программы:
1. Вывести 'Да', если число в переменной a – двузначное.
2. Напишите программу, которая получает три числа - рост трёх спортсменов, и выводит сообщение «По росту.», если они стоят по возрастанию роста, или сообщение «Не по росту!», если они стоят не по росту.
Пример:
Введите рост трёх спортсменов:
165 170 172
По росту.
Пример:
Введите рост трёх спортсменов:
175 170 172
Не по росту!

Ответы

Автор ответа: germiona1best
1

1.Перменная

2. Readln(a, b);

3. Writeln(a + b);

4. Writeln( ((a + b) / 2):10:4);

5. begin, end.



1.

program dwozn;

var  

 n, i: integer;

begin

 write('n= ');

 readln(n);

 for i:= 1 to n do

 begin

   if (a>9) and (a<100) then writeln('Да')

   else writeln('Нет');

 end;

end.


2.

Program n1;

var a,b,c: integer;

begin

readln(a,b,c);

if (c>b) and (c>a)and (b>a) then writeln('По росту.')

else writeln('Не по росту!');  

end.



Rezardo: а что делать если пишет "Неизвестное имя 'a'"
germiona1best: program dwozn;

var

i, a: integer;

begin

write('a= ');

readln(a);

if (a>9) and (a<100) then writeln('Да')

else writeln('Нет');

end.

Попробуй так
Похожие вопросы
Предмет: Физика, автор: kk637251672527