begin
var S := ReadlnString('Вводи сплошной строкой:').ToCharArray;
SetLength(S, 50);
Println('Приняты символы:');
S.Println('');
Println('Найдено z:', S.Count(c -> c = 'z'))
end.
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var (a,b,c):=ReadReal3;
if (a<>b) and (a<0) and (b<0) and (c<0) then begin
(a,b,c):=(a*a,b*b,c*c);
Println(a,b,c)
end
else Writeln('Сумма равна ',a+b+c)
end.
1)Имитационные-имитационное моделирование васпроизводят поведение сложной системы элементы которой могут вести себя случайным образом. Игра жизнь предупреждала Джонам Канвеем
3)1.постановка задачи
2.Разработка концептуальной модели , выявление основных элементов системы и элементарных актов взаимодействия
3.Формализация
4.Планирование и проведение компьютерных экспериментов
5.Анализ и интрепретация резутатов
2)цель графического компьютерного моделирования:сделать невидемое и абстрактное "видемым'
4)
30-x=1 так но это не точно
1.Берём чашку.
2.Ставим на стол
3.берём чайник
4.наливаем в него воду
6. ставим её греть
7.выключаем чайник после подогрева
8 достаём чай
9 ложим пакетик чая в чашку
10 заливаем водой
11.по желанию можно добавить сахар
12когда чай достаточно заварился,вытяни покетик с чаем
13. и выкинь его в мусорку