Вопрос по информатике:
Программа ,вывести на экран таблицу Пифагора и вторая программа вывести на экран все нечетные числа от -50 до 50 через знак плюс
- 11.03.2018 03:06
- Информатика
- remove_red_eye 10540
- thumb_up 7
Ответы и объяснения 1
Первая:
Var
A,B:byte;
Begin
A:=9;
B:=9;
For A:=1 to A do
Begin
For B:=1 to B do
Write(A,'*',B,' = ',(A*B):2,' ');
WriteLn
End
End.
Вторая:
Var i:integer;
Begin
For i:= -50 to 50 do
if i mod 2 =1 then Write('+',i)
else if i mod 2 = -1 then Write(i);
WriteLn('=',0)
End.
- 12.03.2018 01:01
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.