2. определить, делится ли введенное число "а" на 3. если делится то вывести на экран "число делится на 3".тип переменной определить самостоятельно. при составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0. 3. дана программа на языке паскаль. var a,n,s: integer; begin s: =0; n: =0; repeat; write('введите число '); readln(a); s: =s+a; n: =n+1; until s> 100; writeln('количество введенных чисел = ' ,n); end. переписать программу используя цикл while. 4. вывести на экран массив целых чисел, состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].

vikaclevervikap01a7w vikaclevervikap01a7w    2   04.06.2019 03:00    3

Ответы
Avmb Avmb  01.10.2020 19:09
Program qwe;
Uses crt;
var a:real;
begin
clrscr;
Write('Введите число: ');
Readln(a);
if a mod 3=0 then Writeln('Da') else writeln('Net');
readkey;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика