Dmitrievna405
?>

Дайте определения терминам: «алгоритм», «величина переменная», «цикл», «ветвление»

Информатика

Ответы

Рожков Зейдан460
На каком языке надо? Если паскаль то держи:
1)Program A;
Var a:Integer;
Begin
Write('Введите двузначное число');
Read(a);
If (a>10) and (a<100)
Then
Writeln('Число является двузначным')
Else
Writeln('Вы ввели не двузначное число!');
End.

2)var
i,a:integer;
begin
a:=2;
for i:=1 to 20 do
begin
a:=a-1;
writeln(a);
end;
end.

3)Там можно и самому просто дели 555 на 2 как можно больше чтоб конечный ответ был 2/2=0 и там считай уже

4)program b;
var a:integer;
begin
write('Введите любое четное число= ');
read(a);
if a mod 2 = 0
then
write('ответ= ',a/2)
else
write('Было введено нечетное число!');
end.

5)program d;
var i,a:Integer;
begin
a:=2;
for i:=1 to 20 do
begin
a:=a+10;
writeln(a);
end;
end.

6)Его надо делать так же как число и 555 а ответ вообще 4 единицы

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дайте определения терминам: «алгоритм», «величина переменная», «цикл», «ветвление»
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

pri02
Наталья_Васищев
anastasiya613
coalajk
Владимир1524
ninazholnerova9
inulikb
IAleksandrovna45
gostivdom302
natura-domA90
sjmurko
Sakmarov
maksteks
funny-furiya
andreich97