Задача 1. Вывести на экран квадраты чисел от 11 до 27 . Задача 2. Найти произвед...

October 2021 1 26 Report

Задача 1. Вывести на экран квадраты чисел от 11 до 27 .
Задача 2. Найти произведение четных чисел в промежутке от 23 до 5.
Задача 3. Найти сумму двухзначных чисел кратных 7.

Answers & Comments

MarinaManskova 1) Var i:integer; Begin For i:=11 to 23 do Write(i*i,' '); End. 2) Var i,K:integer; Begin K:=1; For i:=5 to 23 do Begin if i mod 2 = 0 then K:=K*i; End; Write(K); End. 3) Var i,K:integer; Begin K:=0; For i:=10 to 99 do Begin If i mod 7 = 0 then K:=K+i; End; Write(K); End.

1 votes Thanks 0

MarinaManskova Все было красиво написано, а теперь…

Answers & Comments

sostavit programmu nahozhdeniya summy chisel 5 21410paskal

najti znacheniya funkcii u h2 7h pri h5 49 48 47 46 0 paskal

najti znacheniya funkcii u 5hh2 pri h50 49 48 47 40 paskal

sostavit programmu nahozhdeniya summy chisel 5 2 1 4 10 paskal

soedinenie kalciya s galogenom imeet molyarnuyu massu 200 gmol kakoj eto galog

sostavit dialog moya budushaya professiya vrach na kazahskom4 voprosa 4otveta

kak ya cenyu i voshishayus etoj frazoj v predlozhenii rechevaya oshibka nuzhno ispravit

рекомендуемые вопросы

Helpful Links

Helpful Social